structure PrintControl =
struct
  val printWidth : int ref
  val printMaxDepth : int ref
end
